home *** CD-ROM | disk | FTP | other *** search
/ Graphics Plus / Graphics Plus.iso / libs / phigs / ptk.lha / ptk / fortran / include / ptk77.h < prev    next >
Encoding:
Text File  |  1992-04-03  |  2.6 KB  |  107 lines
  1. C include file for fortran interface of PHIGS Toolkit 
  2.  
  3. C toolkit types 
  4.  
  5. C axis types
  6.  
  7.        INTEGER*4  PTKEXAXIS
  8.        PARAMETER (PTKEXAXIS = 1)
  9.        INTEGER*4  PTKEYAXIS
  10.        PARAMETER (PTKEYAXIS = 2)
  11.        INTEGER*4  PTKEZAXIS
  12.        PARAMETER (PTKEZAXIS = 3)
  13.  
  14. C colour lightness
  15.  
  16.        INTEGER*4  PTKEVERYDARK
  17.        PARAMETER (PTKEVERYDARK = 0)
  18.        INTEGER*4  PTKEDARK
  19.        PARAMETER (PTKEDARK = 1)
  20.        INTEGER*4  PTKEMEDIUM
  21.        PARAMETER (PTKEMEDIUM = 2)
  22.        INTEGER*4  PTKELIGHT
  23.        PARAMETER (PTKELIGHT = 3)
  24.        INTEGER*4  PTKEVERYLIGHT 
  25.        PARAMETER (PTKEVERYLIGHT = 4)
  26.  
  27. C colour saturation
  28.  
  29.        INTEGER*4  PTKEGREYISH 
  30.        PARAMETER (PTKEGREYISH = 0)
  31.        INTEGER*4  PTKEMODERATE
  32.        PARAMETER (PTKEMODERATE = 1) 
  33.        INTEGER*4  PTKESTRONG
  34.        PARAMETER (PTKESTRONG = 2)
  35.        INTEGER*4  PTKEVIVID
  36.        PARAMETER (PTKEVIVID = 3)
  37.  
  38. C menu types
  39.  
  40.        INTEGER*4 PTKEUSERMENU
  41.        PARAMETER (PTKEUSERMENU = 0)
  42.        INTEGER*4 PTKEBOXMENU
  43.        PARAMETER (PTKEBOXMENU = 1)
  44.  
  45. C rotator dimension
  46.  
  47.        INTEGER*4 PTKEONED
  48.        PARAMETER (PTKEONED = 0)
  49.        INTEGER*4 PTKETWOD
  50.        PARAMETER (PTKETWOD = 1)
  51.        INTEGER*4 PTKETHREED
  52.        PARAMETER (PTKETHREED = 2)
  53.  
  54. C topology types
  55.  
  56.        INTEGER*4   PTKEBOXTOPOLOGY
  57.        PARAMETER (PTKEBOXTOPOLOGY = 0)
  58.        INTEGER*4   PTKESTRUCTTOPOLOGY
  59.        PARAMETER (PTKESTRUCTTOPOLOGY = 1)
  60.        INTEGER*4   PTKESTRUCTNETTOPOLOGY
  61.        PARAMETER (PTKESTRUCTNETTOPOLOGY = 2)
  62.  
  63. C topology nodes
  64.  
  65.        INTEGER*4   PTKESINGLE
  66.        PARAMETER (PTKESINGLE = 0)
  67.        INTEGER*4   PTKEGROUP
  68.        PARAMETER (PTKEGROUP = 1)
  69.  
  70. C window types
  71.  
  72.        INTEGER*4   PTKESTRUCTWINDOW
  73.        PARAMETER (PTKESTRUCTWINDOW = 0)
  74.        INTEGER*4   PTKETERMINALWINDOW
  75.        PARAMETER (PTKETERMINALWINDOW = 1)
  76.        INTEGER*4   PTKETOPOLOGYWINDOW
  77.        PARAMETER (PTKETOPOLOGYWINDOW = 2)
  78.        INTEGER*4   PTKECONTENTWINDOW
  79.        PARAMETER (PTKECONTENTWINDOW = 3)
  80.  
  81. C window areas
  82.  
  83.        INTEGER*4   PTKEWINDOWBANNER
  84.        PARAMETER (PTKEWINDOWBANNER = 0)
  85.        INTEGER*4   PTKEWINDOWFRAME
  86.        PARAMETER (PTKEWINDOWFRAME = 1)
  87.        INTEGER*4   PTKEWINDOWVIEW
  88.        PARAMETER (PTKEWINDOWVIEW = 2)
  89.        INTEGER*4   PTKEWINDOWICON
  90.        PARAMETER (PTKEWINDOWICON = 3)
  91.  
  92. C window state
  93.  
  94.        INTEGER*4   PTKEWINDOWOPEN
  95.        PARAMETER (PTKEWINDOWOPEN = 0)
  96.        INTEGER*4   PTKEWINDOWCLOSED
  97.        PARAMETER (PTKEWINDOWCLOSED = 1)
  98.  
  99. C camera state
  100.  
  101.        INTEGER*4   PTKECAMERAON
  102.        PARAMETER (PTKECAMERAON = 0)
  103.        INTEGER*4   PTKECAMERAOFF
  104.        PARAMETER (PTKECAMERAOFF = 1)
  105.  
  106. C end of ptk77.h
  107.